home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Tech Arsenal 1
/
Tech Arsenal (Arsenal Computer).ISO
/
tek-01
/
phmacro.zip
/
TEST6.OUT
< prev
next >
Wrap
Text File
|
1993-01-04
|
688b
|
61 lines
fn: nam=<m> parms=<a> def=<<<#a>>>
<mmmmmm>
fn: nam=<n> parms=<a> def=<m(a)>
<nnnn>
0: m(1 2 3)
:
1: 1 2 3
:
0R: m(_)
:
0R: <<#a>>
: mmmmmm
string "1 2 3" --> ""
0R: <<"">>
: mmmmmm
0: <<"">>
: mmmmmm
0: <<"">>
:
0: m(z)
:
1: z
:
0R: m(_)
:
0R: <<#a>>
: mmmmmm
string "z" --> ""
0R: <<"">>
: mmmmmm
0: <<"">>
: mmmmmm
0: <<"">>
:
0: n(z)
:
1: z
:
0R: n(_)
:
0R: m(a)
: nnnn
0R: m(z)
: nnnn
0: m(z)
: nnnn
1: z
: n
0R: m(_)
:
0R: <<#a>>
: mmmmmm
string "z" --> ""
0R: <<"">>
: mmmmmm
hide-set #0 = {mn}
0: <<"">>
: 000000
0: <<"">>
: